Scene Storm/Scene Storm - Volume 1.iso/coding/c/unix/src/write.c

C/C++ Source or Header | 1992-08-29 | 401 b | 22 lines

#include "amiga.h"
#include "files.h"
#include <fcntl.h>
#include <unistd.h>

int write(int fd, void *buffer, unsigned int length)
{
  struct fileinfo *fi;

  chkabort();
  if (fi = _find_fd(fd))
    {
      if (fi->flags & FI_WRITE)
    {
      if (fi->flags & O_APPEND) fi->lseek(fi->userinfo, 0, SEEK_END);
      return fi->write(fi->userinfo, buffer, length);
    }
      errno = EACCES;
    }
  return -1;
}